(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 12.1' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[     26491,        685]
NotebookOptionsPosition[     17415,        495]
NotebookOutlinePosition[     18145,        520]
CellTagsIndexPosition[     18066,        515]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[TextData[{
 "New in: ",
 Cell["1.0", "HistoryData",
  CellTags->"New",ExpressionUUID->"b0984b5e-4680-4cfa-a4ec-fa1d7694c6c1"],
 " | Modified in: ",
 Cell[" ", "HistoryData",
  CellTags->"Modified",ExpressionUUID->"fc9b7ab2-2f1b-4773-8e75-89aea6e89500"],
 " | Obsolete in: ",
 Cell[" ", "HistoryData",
  CellTags->"Obsolete",ExpressionUUID->"a4d0b20d-a58c-4e70-8ffa-10772b41de94"],
 " | Excised in: ",
 Cell[" ", "HistoryData",
  CellTags->"Excised",ExpressionUUID->"571bcedc-3a03-46fb-959e-7f408d378ce7"]
}], "History",
 CellChangeTimes->{{3.8295636829711595`*^9, 3.8295636884185977`*^9}},
 CellID->1247902091,ExpressionUUID->"b6c8e17d-4ce5-4afd-b9b3-dc2bf0b6dca0"],

Cell[CellGroupData[{

Cell["Categorization", "CategorizationSection",
 CellID->1122911449,ExpressionUUID->"28e48a98-8e3d-4a11-9471-a3f59c1a0c58"],

Cell["Symbol", "Categorization",
 CellLabel->"Entity Type",
 CellID->686433507,ExpressionUUID->"14b4eeb0-e9ac-41d0-9808-b1aa72e218f9"],

Cell["RefpropLink Package", "Categorization",
 CellLabel->"Paclet Name",
 CellID->92982713,ExpressionUUID->"32102050-dbdd-4617-abd0-c72cf4e2694a"],

Cell["RefpropLink`", "Categorization",
 CellLabel->"Context",
 CellID->537969684,ExpressionUUID->"9941d825-66e4-44fc-8807-eef07451ef9f"],

Cell["RefpropLink/ref/meltt", "Categorization",
 CellLabel->"URI",
 CellID->103079813,ExpressionUUID->"176201ad-e197-480d-ad75-232e91fe5985"]
}, Closed]],

Cell[CellGroupData[{

Cell["Keywords", "KeywordsSection",
 CellID->477174294,ExpressionUUID->"d0d8bdef-c1f1-42ef-b1f4-d00fe6fec176"],

Cell["phase", "Keywords",
 CellChangeTimes->{{3.8295587055784435`*^9, 3.8295587091100144`*^9}},
 CellID->1164421360,ExpressionUUID->"8f351f64-b359-4df9-b552-27da8fe0313a"],

Cell["solid", "Keywords",
 CellChangeTimes->{{3.8295587055784435`*^9, 3.8295587121977477`*^9}},
 CellID->404751975,ExpressionUUID->"257ebbb3-14d1-414e-8886-88afe8cde266"],

Cell["melting", "Keywords",
 CellChangeTimes->{{3.8295587055784435`*^9, 3.8295587144666786`*^9}, {
  3.8295636642661886`*^9, 3.8295636642661886`*^9}},
 CellID->216429290,ExpressionUUID->"fa8dc4bc-9bac-42b1-97a0-eac7b6a288db"],

Cell["freezing", "Keywords",
 CellChangeTimes->{{3.8295587055784435`*^9, 3.8295587144666786`*^9}, {
  3.8295636645793304`*^9, 3.8295636658200417`*^9}},
 CellID->922142592,ExpressionUUID->"49645626-d656-483b-9977-6d32af413900"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Syntax Templates", "TemplatesSection",
 CellID->1872225408,ExpressionUUID->"55576b90-6f97-4ff0-befd-1238d4ce3dc2"],

Cell[BoxData[""], "Template",
 CellLabel->"Additional Function Template",
 CellID->1562036412,ExpressionUUID->"2ded8e44-9762-4029-814a-d50c34060e54"],

Cell[BoxData[""], "Template",
 CellLabel->"Arguments Pattern",
 CellID->158391909,ExpressionUUID->"049b316b-715c-4fb3-aea6-84c9559f075e"],

Cell[BoxData[""], "Template",
 CellLabel->"Local Variables",
 CellID->1360575930,ExpressionUUID->"a7f1efda-2ef7-4f2f-88b9-dda9670919e5"],

Cell[BoxData[""], "Template",
 CellLabel->"Color Equal Signs",
 CellID->793782254,ExpressionUUID->"82d41a36-70df-4d7c-8d0e-efbb53d574f0"]
}, Closed]],

Cell[CellGroupData[{

Cell["Details", "DetailsSection",
 CellID->307771771,ExpressionUUID->"2dc9cf85-4d5a-413e-8c77-062390440eab"],

Cell["Patrick Fourspring", "Details",
 CellChangeTimes->{3.8295637080082197`*^9},
 CellLabel->"Lead",
 CellID->670882175,ExpressionUUID->"8be453ad-a995-42b2-859b-a99062bb0b21"],

Cell["Jeff Henning", "Details",
 CellChangeTimes->{3.829563715567011*^9},
 CellLabel->"Developers",
 CellID->350963985,ExpressionUUID->"fe51c09e-86de-4a8c-adb5-ae3c14512e89"],

Cell["Jeff Henning", "Details",
 CellChangeTimes->{3.8295637182269287`*^9},
 CellLabel->"Authors",
 CellID->8391405,ExpressionUUID->"cf47e3ad-962e-4ba4-9922-a55daa95e24c"],

Cell["XXXX", "Details",
 CellLabel->"Feature Name",
 CellID->3610269,ExpressionUUID->"55842d97-3263-4cd1-a2a3-c3f7410332d1"],

Cell["XXXX", "Details",
 CellLabel->"QA",
 CellID->401364205,ExpressionUUID->"055883d8-e180-484c-804a-85d21219cd3f"],

Cell["XXXX", "Details",
 CellLabel->"DA",
 CellID->350204745,ExpressionUUID->"1b7e250b-b4e1-4efc-9653-ee0df6d1d712"],

Cell["XXXX", "Details",
 CellLabel->"Docs",
 CellID->732958810,ExpressionUUID->"119a55d2-5d0a-4af2-836f-30505dd37297"],

Cell["XXXX", "Details",
 CellLabel->"Features Page Notes",
 CellID->222905350,ExpressionUUID->"9bdbfdb4-2f9c-4d2e-982b-65d7e52c5104"],

Cell["XXXX", "Details",
 CellLabel->"Comments",
 CellID->240026365,ExpressionUUID->"1e5bf302-23ad-4678-9844-10de94102779"]
}, Open  ]],

Cell[CellGroupData[{

Cell["meltt", "ObjectName",
 CellID->1224892054,ExpressionUUID->"6d0ee1ea-ccd9-4e14-9329-7ffeaab569f3"],

Cell[TextData[{
 Cell["   ", "ModInfo",ExpressionUUID->"441925b6-45ea-4e81-bc83-15eea153a0f9"],
 Cell[BoxData[
  RowBox[{"meltt", "[", 
   StyleBox["t", "TI"], "]"}]], "InlineFormula",ExpressionUUID->
  "3b069643-f6d8-4da6-9f6d-18bf622f1430"],
 "\[LineSeparator]computes the melting pressure [kPa] as a function of \
temperature [K] for a pure fluid. \n",
 Cell["   ", "ModInfo",ExpressionUUID->"e312ae0b-9ff4-4f56-bdfc-48fa54e1b3f4"],
 Cell[BoxData[
  RowBox[{"meltt", "[", 
   RowBox[{
    StyleBox["t", "TI"], ",", 
    StyleBox["z", "TI"]}], "]"}]], "InlineFormula",ExpressionUUID->
  "c64e6bc5-e964-446a-a02b-f15b850a76a2"],
 "\[LineSeparator]computes the melting pressure [kPa] as a function of \
temperature [K] and mixture composition."
}], "Usage",
 CellChangeTimes->{{3.829559146659179*^9, 3.8295591556591444`*^9}, {
  3.82955930236788*^9, 
  3.8295593090729523`*^9}},ExpressionUUID->"b5adecb2-dd13-4ba5-a23b-\
d12bd378f829"],

Cell["\<\
The melting/freezing line extends nearly vertically upward from the triple \
point on the temperature-pressure phase diagram.  This routine will, given a \
temperature along that curve, return the corresponding melting pressure at \
the same point.\
\>", "Notes",
 CellChangeTimes->{{3.829559170142395*^9, 3.8295592107548146`*^9}, {
  3.829560479082341*^9, 3.8295604809792976`*^9}},
 CellID->1067943069,ExpressionUUID->"db50ee22-e669-4ca5-9e3d-26359dfe3fa5"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Tutorials", "TutorialsSection",
 CellID->250839057,ExpressionUUID->"83797b27-908e-41f7-8fef-1d956b60c780"],

Cell[TextData[ButtonBox["Pure Fluids (Legacy API)",
 BaseStyle->"Link",
 ButtonData->"paclet:RefpropLink/tutorial/PureFluidsLegacyAPI"]], "Tutorials",
 CellChangeTimes->{{3.829558291402774*^9, 3.829558303402691*^9}, {
  3.829558341260483*^9, 3.8295583414499683`*^9}},
 CellID->341631938,ExpressionUUID->"1d5855db-2821-4c0e-a91f-4200eaca6f0e"],

Cell[TextData[ButtonBox["Mixtures (Legacy API)",
 BaseStyle->"Link",
 ButtonData->"paclet:RefpropLink/tutorial/MixturesLegacyAPI"]], "Tutorials",
 CellChangeTimes->{{3.829558291402774*^9, 3.8295583216578856`*^9}, {
  3.829558353292308*^9, 3.8295583534847927`*^9}},
 CellID->339404089,ExpressionUUID->"9479bd0c-debb-400a-b9e6-33883116f712"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Related Demonstrations", "RelatedDemonstrationsSection",
 CellID->1268215905,ExpressionUUID->"b04425f1-f82a-4f39-a456-f93f6bfa6b9c"],

Cell["XXXX", "RelatedDemonstrations",
 CellID->1129518860,ExpressionUUID->"a4d3e249-63bd-4c07-9a45-316079043275"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Related Links", "RelatedLinksSection",
 CellID->1584193535,ExpressionUUID->"98c4bfc3-4f18-40ef-ad2d-d85ac8070323"],

Cell["XXXX", "RelatedLinks",
 CellID->1038487239,ExpressionUUID->"2dbc2305-32ed-43f8-9f06-8134a354eb4b"]
}, Open  ]],

Cell[CellGroupData[{

Cell["See Also", "SeeAlsoSection",
 CellID->1255426704,ExpressionUUID->"7f4c7389-3651-431c-b844-e1fbbb56a890"],

Cell[TextData[{
 Cell[BoxData[
  ButtonBox["meltp",
   BaseStyle->"Link",
   ButtonData->"paclet:RefpropLink/ref/meltp"]], "InlineFormula",
  ExpressionUUID->"df13ee9a-38f9-4687-816e-af8007cddf82"],
 " \[EmptyVerySmallSquare] ",
 Cell[BoxData[
  ButtonBox["satt",
   BaseStyle->"Link",
   ButtonData->"paclet:RefpropLink/ref/satt"]], "InlineFormula",
  ExpressionUUID->"fa673c68-095f-4c2b-b3a1-e14f485d6a6b"],
 " \[EmptyVerySmallSquare] ",
 Cell[BoxData[
  ButtonBox["satp",
   BaseStyle->"Link",
   ButtonData->"paclet:RefpropLink/ref/satp"]], "InlineFormula",
  ExpressionUUID->"178c8981-c2e2-400f-aa18-096ae3fdab82"]
}], "SeeAlso",
 CellChangeTimes->{{3.829559244570406*^9, 3.8295592524024963`*^9}},
 CellID->929782353,ExpressionUUID->"916971d6-de8b-4860-99c8-f7d547cd74d0"]
}, Open  ]],

Cell[CellGroupData[{

Cell["More About", "MoreAboutSection",
 CellID->38303248,ExpressionUUID->"d7c6368d-dc08-4622-97d5-4632b0b8d5a0"],

Cell["XXXX", "MoreAbout",
 CellID->1665078683,ExpressionUUID->"ffe87c0d-8e0d-41ff-a5d9-6af2ece10f3f"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 InterpretationBox[GridBox[{
    {
     StyleBox["Examples", "PrimaryExamplesSection"], 
     ButtonBox[
      RowBox[{
       RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
      BaseStyle->"ExtendedExamplesLink",
      ButtonData:>"ExtendedExamples"]}
   }],
  $Line = 0; Null]], "PrimaryExamplesSection",
 CellID->880084151,ExpressionUUID->"71a24df1-72f7-41e3-a464-d36ad9029d9b"],

Cell["Load water as a pure fluid.", "ExampleText",
 CellChangeTimes->{{3.8295593470514383`*^9, 3.8295593721872115`*^9}},
 CellID->11598135,ExpressionUUID->"5a17861a-92b6-4af7-84c0-b592458890bf"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"setup", "[", 
  RowBox[{"{", "\"\<Water\>\"", "}"}], "]"}]], "Input",
 CellChangeTimes->{{3.829559377521949*^9, 3.829559388291157*^9}},
 CellLabel->"In[1]:=",
 CellID->312990974,ExpressionUUID->"5b2592cc-197e-4ced-b58f-59c99bd93e8e"],

Cell[BoxData["0"], "Output",
 CellChangeTimes->{3.829559389983632*^9, 3.8295597006724815`*^9},
 CellLabel->"Out[1]=",
 CellID->502716806,ExpressionUUID->"8c755003-5dc2-4cde-9522-d5b09ca493c1"]
}, Open  ]],

Cell["\<\
Calculate the melting pressure at a temperature of 272.4 K, 273.0 K, 274 K \
and 280 K.\
\>", "ExampleText",
 CellChangeTimes->{{3.8295593990473995`*^9, 3.8295594206357093`*^9}, {
  3.8295597145863085`*^9, 3.829559718370165*^9}, {3.829559792474041*^9, 
  3.8295598470341988`*^9}, {3.8295604462580986`*^9, 3.829560446370826*^9}, {
  3.8295608595629144`*^9, 3.8295608952016287`*^9}, {3.8295609296904187`*^9, 
  3.8295609330025635`*^9}},
 CellID->250619902,ExpressionUUID->"2940b473-9a90-4a3a-8f42-b84de7eac5a3"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"meltt", "[", 
  RowBox[{"272.4", " ", "K"}], "]"}]], "Input",
 CellChangeTimes->{{3.829559427880312*^9, 3.8295594390993166`*^9}, {
  3.829559819458895*^9, 3.829559828122763*^9}, {3.8295598970923357`*^9, 
  3.8295599098761635`*^9}, {3.8295604292026978`*^9, 3.8295604293552895`*^9}},
 CellLabel->"In[7]:=",
 CellID->13899743,ExpressionUUID->"6c95fcfc-8f36-4f71-a5c7-03cc024c9c5e"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"\<\"P\"\>", "\[Rule]", 
   TemplateBox[{
    "614023.8909154822`", "\"kPa\"", "kilopascals", "\"Kilopascals\""},
    "Quantity"]}], "}"}]], "Output",
 CellChangeTimes->{3.8295594509765844`*^9, 3.829559704616945*^9, 
  3.829559873137382*^9, 3.829560430782475*^9},
 CellLabel->"Out[7]=",
 CellID->421397699,ExpressionUUID->"17912b37-ffd5-42a7-bc3c-2c4148ddd24c"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"meltt", "[", 
  RowBox[{"273.0", "K"}], "]"}]], "Input",
 CellChangeTimes->{{3.8295597221111617`*^9, 3.8295597369953966`*^9}, {
  3.8295598557708125`*^9, 3.829559866467243*^9}},
 CellLabel->"In[5]:=",
 CellID->257365899,ExpressionUUID->"e5ae31d2-d9c5-43d3-8d0f-0e5ab902904b"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"\<\"P\"\>", "\[Rule]", 
   TemplateBox[{
    "626091.3481916821`", "\"kPa\"", "kilopascals", "\"Kilopascals\""},
    "Quantity"]}], "}"}]], "Output",
 CellChangeTimes->{3.8295597397310543`*^9, 3.829559877016012*^9},
 CellLabel->"Out[5]=",
 CellID->287646730,ExpressionUUID->"2625e68f-fce1-4dcc-a8e0-20b7f614d3b9"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"meltt", "[", 
  RowBox[{"274.0", "K"}], "]"}]], "Input",
 CellChangeTimes->{{3.8295609411178665`*^9, 3.829560953114792*^9}},
 CellLabel->"In[8]:=",
 CellID->114630982,ExpressionUUID->"fe52d431-a471-467e-9647-d0fb6f408a6c"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"\<\"P\"\>", "\[Rule]", 
   TemplateBox[{
    "640329.1776590856`", "\"kPa\"", "kilopascals", "\"Kilopascals\""},
    "Quantity"]}], "}"}]], "Output",
 CellChangeTimes->{3.82956095423779*^9},
 CellLabel->"Out[8]=",
 CellID->132845147,ExpressionUUID->"0735c426-ac2d-4b32-8f2c-e81ec4421c12"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"meltt", "[", 
  RowBox[{"280", " ", "K"}], "]"}]], "Input",
 CellChangeTimes->{{3.829560958341837*^9, 3.8295609666675577`*^9}},
 CellLabel->"In[9]:=",
 CellID->453540037,ExpressionUUID->"d78029b4-df4a-4974-8a45-1329de24c02e"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"\<\"P\"\>", "\[Rule]", 
   TemplateBox[{
    "712374.1478119837`", "\"kPa\"", "kilopascals", "\"Kilopascals\""},
    "Quantity"]}], "}"}]], "Output",
 CellChangeTimes->{3.829560968246337*^9},
 CellLabel->"Out[9]=",
 CellID->422514376,ExpressionUUID->"8bb152f6-62f7-4491-97b3-22e6e5238e90"]
}, Open  ]],

Cell["\<\
Note that, for water, the melting/freezing line extends very nearly \
vertically to very high pressures, around 10 MPa and then bends deviates to \
lower temperatures down to 251.165 K before bending back to higher \
temperatures at extremely high pressures, on the order of 1 GPa.  For this \
reason, this function is double valued at temperatures just below the triple \
point and will return the upper root, nearer to 600 MPa.\
\>", "ExampleText",
 CellChangeTimes->{{3.8295604581473117`*^9, 3.8295604710677986`*^9}, {
  3.82956050119425*^9, 3.8295605221312466`*^9}, {3.82956063418548*^9, 
  3.829560843266513*^9}},
 CellID->520040809,ExpressionUUID->"fa71f870-0b8a-4d20-b4d1-e03c97b23ae7"],

Cell["\<\
Care should be taken with any fluid to ensure that the expected root is being \
returned where the freezing line may be double-valued at a specific \
temperature.\
\>", "ExampleText",
 CellChangeTimes->{{3.829560985900138*^9, 3.8295610524033356`*^9}},
 CellID->312568277,ExpressionUUID->"636d877b-c71f-4ec4-948d-1e8c0bd4ffff"]
}, Open  ]],

Cell[CellGroupData[{

Cell["More Examples", "ExtendedExamplesSection",
 CellTags->"ExtendedExamples",
 CellID->1854448968,ExpressionUUID->"12dff899-ea37-4f73-bbbd-67088f904cb8"],

Cell[BoxData[
 InterpretationBox[Cell[
  "Scope", "ExampleSection",ExpressionUUID->
   "f33b83d3-36f4-4df2-9cbb-00fed0384ff1"],
  $Line = 0; Null]], "ExampleSection",
 CellID->1293636265,ExpressionUUID->"85d8c3e2-1b9f-42b0-80fb-9a6b4d2c4c92"],

Cell[BoxData[
 InterpretationBox[Cell[
  "Generalizations & Extensions", "ExampleSection",ExpressionUUID->
   "96610666-9873-424b-8d76-3433ddf8adeb"],
  $Line = 0; Null]], "ExampleSection",
 CellID->1020263627,ExpressionUUID->"1572a0fd-9f7c-4f1a-87b1-e3e39d29f65a"],

Cell[CellGroupData[{

Cell[BoxData[
 InterpretationBox[Cell[
  "Options", "ExampleSection",ExpressionUUID->
   "45154f73-1804-4324-aba0-74cfd5bb2e62"],
  $Line = 0; Null]], "ExampleSection",
 CellID->2061341341,ExpressionUUID->"67b70da9-9ddf-400c-8a1c-6f84a7da342f"],

Cell[BoxData[
 InterpretationBox[Cell[
  "XXXX", "ExampleSubsection",ExpressionUUID->
   "aa19cd0c-8fb1-4487-b25a-766297d99df2"],
  $Line = 0; Null]], "ExampleSubsection",
 CellID->1757724783,ExpressionUUID->"a188b2d2-5c04-4202-a876-862b74fdd0e9"],

Cell[BoxData[
 InterpretationBox[Cell[
  "XXXX", "ExampleSubsection",ExpressionUUID->
   "5ae7a363-ecfa-4edf-a1e9-e6662e4585cf"],
  $Line = 0; Null]], "ExampleSubsection",
 CellID->1295379749,ExpressionUUID->"c93a3d89-8c89-4f04-bb57-689d27b7541f"]
}, Closed]],

Cell[BoxData[
 InterpretationBox[Cell[
  "Applications", "ExampleSection",ExpressionUUID->
   "3b921248-66f1-4c62-ae2c-028b55f39ce7"],
  $Line = 0; Null]], "ExampleSection",
 CellID->258228157,ExpressionUUID->"ed1aa8ef-fe8c-47d2-b12e-4a3a5a0218d8"],

Cell[BoxData[
 InterpretationBox[Cell[
  "Properties & Relations", "ExampleSection",ExpressionUUID->
   "9e0bd8bc-26bc-4ce9-bc54-17a0d0800e7d"],
  $Line = 0; Null]], "ExampleSection",
 CellID->2123667759,ExpressionUUID->"b825f6a1-acaa-471b-889d-b9bec6d862a8"],

Cell[BoxData[
 InterpretationBox[Cell[
  "Possible Issues", "ExampleSection",ExpressionUUID->
   "6f67ce7f-83c0-4a18-8b3c-a0b59d261918"],
  $Line = 0; Null]], "ExampleSection",
 CellID->1305812373,ExpressionUUID->"13ae0bbc-5f76-4d85-9ca0-ed8d74385df3"],

Cell[BoxData[
 InterpretationBox[Cell[
  "Interactive Examples", "ExampleSection",ExpressionUUID->
   "c46efebc-77fc-4baa-81fa-30d2b66c9167"],
  $Line = 0; Null]], "ExampleSection",
 CellID->1653164318,ExpressionUUID->"f3384d77-f924-401c-8640-e300a7dae0a1"],

Cell[BoxData[
 InterpretationBox[Cell[
  "Neat Examples", "ExampleSection",ExpressionUUID->
   "6f374cba-1ca5-4e13-a6fd-1eb4dd5b5784"],
  $Line = 0; Null]], "ExampleSection",
 CellID->589267740,ExpressionUUID->"7095fc92-d7ec-4018-aab7-653fc97f2e05"]
}, Open  ]]
},
WindowSize->{700, 770},
WindowMargins->{{Automatic, 373}, {Automatic, 62}},
CellContext->"Global`",
FrontEndVersion->"12.1 for Microsoft Windows (64-bit) (June 19, 2020)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb", 
  CharacterEncoding -> "UTF-8"],
ExpressionUUID->"c42d7fff-0b73-49d2-9e26-7b4a031d2ff4"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
 "ExtendedExamples"->{
  Cell[14670, 417, 155, 2, 54, "ExtendedExamplesSection",ExpressionUUID->"12dff899-ea37-4f73-bbbd-67088f904cb8",
   CellTags->"ExtendedExamples",
   CellID->1854448968]}
 }
*)
(*CellTagsIndex
CellTagsIndex->{
 {"ExtendedExamples", 17872, 508}
 }
*)
(*NotebookFileOutline
Notebook[{
Cell[558, 20, 670, 15, 22, "History",ExpressionUUID->"b6c8e17d-4ce5-4afd-b9b3-dc2bf0b6dca0",
 CellID->1247902091],
Cell[CellGroupData[{
Cell[1253, 39, 123, 1, 27, "CategorizationSection",ExpressionUUID->"28e48a98-8e3d-4a11-9471-a3f59c1a0c58",
 CellID->1122911449],
Cell[1379, 42, 134, 2, 31, "Categorization",ExpressionUUID->"14b4eeb0-e9ac-41d0-9808-b1aa72e218f9",
 CellID->686433507],
Cell[1516, 46, 146, 2, 31, "Categorization",ExpressionUUID->"32102050-dbdd-4617-abd0-c72cf4e2694a",
 CellID->92982713],
Cell[1665, 50, 136, 2, 31, "Categorization",ExpressionUUID->"9941d825-66e4-44fc-8807-eef07451ef9f",
 CellID->537969684],
Cell[1804, 54, 141, 2, 31, "Categorization",ExpressionUUID->"176201ad-e197-480d-ad75-232e91fe5985",
 CellID->103079813]
}, Closed]],
Cell[CellGroupData[{
Cell[1982, 61, 110, 1, 17, "KeywordsSection",ExpressionUUID->"d0d8bdef-c1f1-42ef-b1f4-d00fe6fec176",
 CellID->477174294],
Cell[2095, 64, 171, 2, 17, "Keywords",ExpressionUUID->"8f351f64-b359-4df9-b552-27da8fe0313a",
 CellID->1164421360],
Cell[2269, 68, 170, 2, 17, "Keywords",ExpressionUUID->"257ebbb3-14d1-414e-8886-88afe8cde266",
 CellID->404751975],
Cell[2442, 72, 225, 3, 17, "Keywords",ExpressionUUID->"fa8dc4bc-9bac-42b1-97a0-eac7b6a288db",
 CellID->216429290],
Cell[2670, 77, 226, 3, 17, "Keywords",ExpressionUUID->"49645626-d656-483b-9977-6d32af413900",
 CellID->922142592]
}, Open  ]],
Cell[CellGroupData[{
Cell[2933, 85, 120, 1, 27, "TemplatesSection",ExpressionUUID->"55576b90-6f97-4ff0-befd-1238d4ce3dc2",
 CellID->1872225408],
Cell[3056, 88, 149, 2, 70, "Template",ExpressionUUID->"2ded8e44-9762-4029-814a-d50c34060e54",
 CellID->1562036412],
Cell[3208, 92, 137, 2, 70, "Template",ExpressionUUID->"049b316b-715c-4fb3-aea6-84c9559f075e",
 CellID->158391909],
Cell[3348, 96, 136, 2, 70, "Template",ExpressionUUID->"a7f1efda-2ef7-4f2f-88b9-dda9670919e5",
 CellID->1360575930],
Cell[3487, 100, 137, 2, 70, "Template",ExpressionUUID->"82d41a36-70df-4d7c-8d0e-efbb53d574f0",
 CellID->793782254]
}, Closed]],
Cell[CellGroupData[{
Cell[3661, 107, 108, 1, 17, "DetailsSection",ExpressionUUID->"2dc9cf85-4d5a-413e-8c77-062390440eab",
 CellID->307771771],
Cell[3772, 110, 176, 3, 31, "Details",ExpressionUUID->"8be453ad-a995-42b2-859b-a99062bb0b21",
 CellID->670882175],
Cell[3951, 115, 174, 3, 31, "Details",ExpressionUUID->"fe51c09e-86de-4a8c-adb5-ae3c14512e89",
 CellID->350963985],
Cell[4128, 120, 171, 3, 31, "Details",ExpressionUUID->"cf47e3ad-962e-4ba4-9922-a55daa95e24c",
 CellID->8391405],
Cell[4302, 125, 124, 2, 31, "Details",ExpressionUUID->"55842d97-3263-4cd1-a2a3-c3f7410332d1",
 CellID->3610269],
Cell[4429, 129, 116, 2, 31, "Details",ExpressionUUID->"055883d8-e180-484c-804a-85d21219cd3f",
 CellID->401364205],
Cell[4548, 133, 116, 2, 31, "Details",ExpressionUUID->"1b7e250b-b4e1-4efc-9653-ee0df6d1d712",
 CellID->350204745],
Cell[4667, 137, 118, 2, 31, "Details",ExpressionUUID->"119a55d2-5d0a-4af2-836f-30505dd37297",
 CellID->732958810],
Cell[4788, 141, 133, 2, 31, "Details",ExpressionUUID->"9bdbfdb4-2f9c-4d2e-982b-65d7e52c5104",
 CellID->222905350],
Cell[4924, 145, 122, 2, 31, "Details",ExpressionUUID->"1e5bf302-23ad-4678-9844-10de94102779",
 CellID->240026365]
}, Open  ]],
Cell[CellGroupData[{
Cell[5083, 152, 103, 1, 62, "ObjectName",ExpressionUUID->"6d0ee1ea-ccd9-4e14-9329-7ffeaab569f3",
 CellID->1224892054],
Cell[5189, 155, 935, 21, 106, "Usage",ExpressionUUID->"b5adecb2-dd13-4ba5-a23b-d12bd378f829"],
Cell[6127, 178, 468, 8, 51, "Notes",ExpressionUUID->"db50ee22-e669-4ca5-9e3d-26359dfe3fa5",
 CellID->1067943069]
}, Open  ]],
Cell[CellGroupData[{
Cell[6632, 191, 112, 1, 44, "TutorialsSection",ExpressionUUID->"83797b27-908e-41f7-8fef-1d956b60c780",
 CellID->250839057],
Cell[6747, 194, 342, 5, 16, "Tutorials",ExpressionUUID->"1d5855db-2821-4c0e-a91f-4200eaca6f0e",
 CellID->341631938],
Cell[7092, 201, 339, 5, 16, "Tutorials",ExpressionUUID->"9479bd0c-debb-400a-b9e6-33883116f712",
 CellID->339404089]
}, Open  ]],
Cell[CellGroupData[{
Cell[7468, 211, 138, 1, 31, "RelatedDemonstrationsSection",ExpressionUUID->"b04425f1-f82a-4f39-a456-f93f6bfa6b9c",
 CellID->1268215905],
Cell[7609, 214, 113, 1, 16, "RelatedDemonstrations",ExpressionUUID->"a4d3e249-63bd-4c07-9a45-316079043275",
 CellID->1129518860]
}, Open  ]],
Cell[CellGroupData[{
Cell[7759, 220, 120, 1, 31, "RelatedLinksSection",ExpressionUUID->"98c4bfc3-4f18-40ef-ad2d-d85ac8070323",
 CellID->1584193535],
Cell[7882, 223, 104, 1, 16, "RelatedLinks",ExpressionUUID->"2dbc2305-32ed-43f8-9f06-8134a354eb4b",
 CellID->1038487239]
}, Open  ]],
Cell[CellGroupData[{
Cell[8023, 229, 110, 1, 31, "SeeAlsoSection",ExpressionUUID->"7f4c7389-3651-431c-b844-e1fbbb56a890",
 CellID->1255426704],
Cell[8136, 232, 777, 20, 18, "SeeAlso",ExpressionUUID->"916971d6-de8b-4860-99c8-f7d547cd74d0",
 CellID->929782353]
}, Open  ]],
Cell[CellGroupData[{
Cell[8950, 257, 112, 1, 31, "MoreAboutSection",ExpressionUUID->"d7c6368d-dc08-4622-97d5-4632b0b8d5a0",
 CellID->38303248],
Cell[9065, 260, 101, 1, 16, "MoreAbout",ExpressionUUID->"ffe87c0d-8e0d-41ff-a5d9-6af2ece10f3f",
 CellID->1665078683]
}, Open  ]],
Cell[CellGroupData[{
Cell[9203, 266, 411, 11, 68, "PrimaryExamplesSection",ExpressionUUID->"71a24df1-72f7-41e3-a464-d36ad9029d9b",
 CellID->880084151],
Cell[9617, 279, 194, 2, 20, "ExampleText",ExpressionUUID->"5a17861a-92b6-4af7-84c0-b592458890bf",
 CellID->11598135],
Cell[CellGroupData[{
Cell[9836, 285, 257, 5, 25, "Input",ExpressionUUID->"5b2592cc-197e-4ced-b58f-59c99bd93e8e",
 CellID->312990974],
Cell[10096, 292, 192, 3, 24, "Output",ExpressionUUID->"8c755003-5dc2-4cde-9522-d5b09ca493c1",
 CellID->502716806]
}, Open  ]],
Cell[10303, 298, 519, 9, 20, "ExampleText",ExpressionUUID->"2940b473-9a90-4a3a-8f42-b84de7eac5a3",
 CellID->250619902],
Cell[CellGroupData[{
Cell[10847, 311, 402, 7, 25, "Input",ExpressionUUID->"6c95fcfc-8f36-4f71-a5c7-03cc024c9c5e",
 CellID->13899743],
Cell[11252, 320, 400, 9, 33, "Output",ExpressionUUID->"17912b37-ffd5-42a7-bc3c-2c4148ddd24c",
 CellID->421397699]
}, Open  ]],
Cell[CellGroupData[{
Cell[11689, 334, 299, 6, 25, "Input",ExpressionUUID->"e5ae31d2-d9c5-43d3-8d0f-0e5ab902904b",
 CellID->257365899],
Cell[11991, 342, 353, 8, 33, "Output",ExpressionUUID->"2625e68f-fce1-4dcc-a8e0-20b7f614d3b9",
 CellID->287646730]
}, Open  ]],
Cell[CellGroupData[{
Cell[12381, 355, 246, 5, 25, "Input",ExpressionUUID->"fe52d431-a471-467e-9647-d0fb6f408a6c",
 CellID->114630982],
Cell[12630, 362, 328, 8, 33, "Output",ExpressionUUID->"0735c426-ac2d-4b32-8f2c-e81ec4421c12",
 CellID->132845147]
}, Open  ]],
Cell[CellGroupData[{
Cell[12995, 375, 249, 5, 25, "Input",ExpressionUUID->"d78029b4-df4a-4974-8a45-1329de24c02e",
 CellID->453540037],
Cell[13247, 382, 329, 8, 33, "Output",ExpressionUUID->"8bb152f6-62f7-4491-97b3-22e6e5238e90",
 CellID->422514376]
}, Open  ]],
Cell[13591, 393, 703, 11, 72, "ExampleText",ExpressionUUID->"fa71f870-0b8a-4d20-b4d1-e03c97b23ae7",
 CellID->520040809],
Cell[14297, 406, 336, 6, 33, "ExampleText",ExpressionUUID->"636d877b-c71f-4ec4-948d-1e8c0bd4ffff",
 CellID->312568277]
}, Open  ]],
Cell[CellGroupData[{
Cell[14670, 417, 155, 2, 54, "ExtendedExamplesSection",ExpressionUUID->"12dff899-ea37-4f73-bbbd-67088f904cb8",
 CellTags->"ExtendedExamples",
 CellID->1854448968],
Cell[14828, 421, 242, 5, 31, "ExampleSection",ExpressionUUID->"85d8c3e2-1b9f-42b0-80fb-9a6b4d2c4c92",
 CellID->1293636265],
Cell[15073, 428, 265, 5, 19, "ExampleSection",ExpressionUUID->"1572a0fd-9f7c-4f1a-87b1-e3e39d29f65a",
 CellID->1020263627],
Cell[CellGroupData[{
Cell[15363, 437, 244, 5, 19, "ExampleSection",ExpressionUUID->"67b70da9-9ddf-400c-8a1c-6f84a7da342f",
 CellID->2061341341],
Cell[15610, 444, 247, 5, 70, "ExampleSubsection",ExpressionUUID->"a188b2d2-5c04-4202-a876-862b74fdd0e9",
 CellID->1757724783],
Cell[15860, 451, 247, 5, 70, "ExampleSubsection",ExpressionUUID->"c93a3d89-8c89-4f04-bb57-689d27b7541f",
 CellID->1295379749]
}, Closed]],
Cell[16122, 459, 248, 5, 19, "ExampleSection",ExpressionUUID->"ed1aa8ef-fe8c-47d2-b12e-4a3a5a0218d8",
 CellID->258228157],
Cell[16373, 466, 259, 5, 19, "ExampleSection",ExpressionUUID->"b825f6a1-acaa-471b-889d-b9bec6d862a8",
 CellID->2123667759],
Cell[16635, 473, 252, 5, 19, "ExampleSection",ExpressionUUID->"13ae0bbc-5f76-4d85-9ca0-ed8d74385df3",
 CellID->1305812373],
Cell[16890, 480, 257, 5, 19, "ExampleSection",ExpressionUUID->"f3384d77-f924-401c-8640-e300a7dae0a1",
 CellID->1653164318],
Cell[17150, 487, 249, 5, 19, "ExampleSection",ExpressionUUID->"7095fc92-d7ec-4018-aab7-653fc97f2e05",
 CellID->589267740]
}, Open  ]]
}
]
*)

